GetVersion will get the current version number of your database as determined by the 'vers' resource. Your 4D procedure may change this value and write it back to the 'vers' resource with the SetVersion external.
The 'vers' resource is read by Apple's System 6.0.x when you do a 'Get Info' on a document. This means that you will be able to look up the version number of your database without having to actually go into it.
If you were storing your version numbers withing a database you probably had some problems whenever it was cloned. GetVersion and SetVersion keep the version numbers outside of the database and thus are not affected by cloning.
GetVersion(str1;str2;str3;int1;int2;int3;int4)
str1=Top value in 'Get Info' box
str2=Bottom value in 'Get Info' box
str3=short string (see Tech note 126)
int1=version number
int2=revision number
int3=development, alpha, beta, release
int4=Build Number
For further illumination of this mystery please consult Technical Note #126 or the Example database.
